<html><head><title>Http.pb</title></head>
<body bgcolor="#EFF1F0" link="#3A3966" vlink="#000000" alink="#000000">
<pre><font face="Courier New, Courier, mono"size="2"><font color="#3A3966">;
</font><font color="#3A3966">; ------------------------------------------------------------
</font><font color="#3A3966">;
</font><font color="#3A3966">;   PureBasic - Http example file
</font><font color="#3A3966">;
</font><font color="#3A3966">;    (c) Fantaisie Software
</font><font color="#3A3966">;
</font><font color="#3A3966">; ------------------------------------------------------------
</font><font color="#3A3966">;
</font>
<font color="#3A3966">InitNetwork</font>()


URL$ = &quot;http://user:pass@www.purebasic.com:1024/subdirectory/index.php?year=2008&amp;month=12&amp;day=3&quot;
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, &quot;year&quot;)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Site</font>)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Port</font>)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Parameters</font>)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Path</font>)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, <font color="#924B72">#PB_URL_User</font>)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">GetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Password</font>)

<b><font color="#3A3966">Debug</font></b> &quot;-------&quot;
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">SetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Site</font>, &quot;forums.purebasic.fr&quot;)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">SetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Port</font>, &quot;80&quot;)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">SetURLPart</font>(URL$, <font color="#924B72">#PB_URL_User</font>, &quot;bericko&quot;)
<b><font color="#3A3966">Debug</font></b> <font color="#3A3966">SetURLPart</font>(URL$, <font color="#924B72">#PB_URL_Password</font>, &quot;password&quot;)



</font></pre>
</body></html>
